home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness: Critical Thinking Skills / Workplace Effectiveness: Critical Thinking Skills.iso / pc / Files / Define.dxr / 00001_Startup.ls next >
Encoding:
Text File  |  1998-09-15  |  477 b   |  20 lines
  1. global gMasterData
  2.  
  3. on prepareMovie
  4.   setModule(gMasterData, #define)
  5.   setUserArea(gMasterData, #define)
  6.   setFingerCursor(#on, [40, 41, 42, 43, 44])
  7.   set the keyDownScript to "quitCatcher"
  8.   cursor(0)
  9. end
  10.  
  11. on initFields
  12.   set vEmptyList to ["response1", "response2"]
  13.   repeat with x in vEmptyList
  14.     set the text of member x to " "
  15.     set the textFont of member x to "Palatino"
  16.     set the textSize of member x to 14
  17.     set the text of member x to EMPTY
  18.   end repeat
  19. end
  20.